home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / net / amitcp2_x_gcc.lha / printfault.c < prev    next >
C/C++ Source or Header  |  1994-01-12  |  1KB  |  47 lines
  1. char RCS_ID_PRINTFAULT_C[] = "$Id: printfault.c,v 1.5 1994/01/12 18:36:09 jasegler Exp jasegler $";
  2. /*
  3.  * printfault.c --- Print a socket error message (DOS)
  4.  *
  5.  * Author: ppessi <Pekka.Pessi@hut.fi>
  6.  *
  7.  * Copyright © 1993 AmiTCP/IP Group, <amitcp-group@hut.fi>
  8.  *                  Helsinki University of Technology, Finland.
  9.  *                  All rights reserved.
  10.  *
  11.  * Created      : Sat Mar 20 02:10:14 1993 ppessi
  12.  * Last modified: Fri Jun  4 02:05:44 1993 ppessi
  13.  */
  14.  
  15. #include <errno.h>
  16.  
  17. #include <exec/execbase.h>
  18. extern struct ExecBase *SysBase;
  19.  
  20. #include <dos/dos.h>
  21. #include <dos/dosextens.h>
  22.  
  23. #if __SASC
  24. #include <proto/dos.h>
  25. #elif __GNUC__
  26. #include <clib/dos_protos.h>
  27. #endif
  28.  
  29. void
  30. PrintNetFault (LONG code, const UBYTE * banner)
  31. {
  32.   struct Process *p = (struct Process *) SysBase->ThisTask;
  33.   BPTR Stderr = p->pr_CES ? p->pr_CES : p->pr_COS;
  34.  
  35.   FPuts (Stderr, (UBYTE *) banner);
  36.   FPuts (Stderr, ": ");
  37.  
  38.   if (code < __sys_nerr)
  39.     banner = (UBYTE *) __sys_errlist[code];
  40.   else
  41.     banner = (UBYTE *) __sys_errlist[0];
  42.  
  43.   FPuts (Stderr, (UBYTE *) banner);
  44.   FPuts (Stderr, "\n");
  45.   Flush (Stderr);
  46. }
  47.